home *** CD-ROM | disk | FTP | other *** search
/ Aminet 45 / Aminet 45 (2001)(GTI - Schatztruhe)[!][Oct 2001].iso / Aminet / dev / e / yaec.lha / modules / layers.e < prev    next >
Text File  |  2001-08-12  |  4KB  |  38 lines
  1. OPT MODULE
  2. OPT EXPORT
  3. -> Module created with E:bin/fd2module from YAECv18 package.
  4. OPT NDDC
  5. #macro InitLayers(li) IS (A0:=li) BUT (A6:=layersbase) BUT ASM ' jsr -30(a6)'
  6. #macro CreateUpfrontLayer(li,bm,x0,y0,x1,y1,flags,bm2) IS ASM ' movem.l d2-d7/a2-a5,-(a7)' BUT Stores(layersbase,li,bm,x0,y0,x1,y1,flags,bm2) BUT Loads(A6,A0,A1,D0,D1,D2,D3,D4,A2) BUT ASM ' jsr -36(a6)' BUT ASM ' movem.l (a7)+, d2-d7/a2-a5'
  7. #macro CreateBehindLayer(li,bm,x0,y0,x1,y1,flags,bm2) IS ASM ' movem.l d2-d7/a2-a5,-(a7)' BUT Stores(layersbase,li,bm,x0,y0,x1,y1,flags,bm2) BUT Loads(A6,A0,A1,D0,D1,D2,D3,D4,A2) BUT ASM ' jsr -42(a6)' BUT ASM ' movem.l (a7)+, d2-d7/a2-a5'
  8. #macro UpfrontLayer(dummy,layer) IS Stores(layersbase,dummy,layer) BUT Loads(A6,A0,A1) BUT ASM ' jsr -48(a6)'
  9. #macro BehindLayer(dummy,layer) IS Stores(layersbase,dummy,layer) BUT Loads(A6,A0,A1) BUT ASM ' jsr -54(a6)'
  10. #macro MoveLayer(dummy,layer,dx,dy) IS Stores(layersbase,dummy,layer,dx,dy) BUT Loads(A6,A0,A1,D0,D1) BUT ASM ' jsr -60(a6)'
  11. #macro SizeLayer(dummy,layer,dx,dy) IS Stores(layersbase,dummy,layer,dx,dy) BUT Loads(A6,A0,A1,D0,D1) BUT ASM ' jsr -66(a6)'
  12. #macro ScrollLayer(dummy,layer,dx,dy) IS Stores(layersbase,dummy,layer,dx,dy) BUT Loads(A6,A0,A1,D0,D1) BUT ASM ' jsr -72(a6)'
  13. #macro BeginUpdate(l) IS (A0:=l) BUT (A6:=layersbase) BUT ASM ' jsr -78(a6)'
  14. #macro EndUpdate(layer,flag) IS Stores(layersbase,layer,flag) BUT Loads(A6,A0,D0) BUT ASM ' jsr -84(a6)'
  15. #macro DeleteLayer(dummy,layer) IS Stores(layersbase,dummy,layer) BUT Loads(A6,A0,A1) BUT ASM ' jsr -90(a6)'
  16. #macro LockLayer(dummy,layer) IS Stores(layersbase,dummy,layer) BUT Loads(A6,A0,A1) BUT ASM ' jsr -96(a6)'
  17. #macro UnlockLayer(layer) IS (A0:=layer) BUT (A6:=layersbase) BUT ASM ' jsr -102(a6)'
  18. #macro LockLayers(li) IS (A0:=li) BUT (A6:=layersbase) BUT ASM ' jsr -108(a6)'
  19. #macro UnlockLayers(li) IS (A0:=li) BUT (A6:=layersbase) BUT ASM ' jsr -114(a6)'
  20. #macro LockLayerInfo(li) IS (A0:=li) BUT (A6:=layersbase) BUT ASM ' jsr -120(a6)'
  21. #macro SwapBitsRastPortClipRect(rp,cr) IS Stores(layersbase,rp,cr) BUT Loads(A6,A0,A1) BUT ASM ' jsr -126(a6)'
  22. #macro WhichLayer(li,x,y) IS Stores(layersbase,li,x,y) BUT Loads(A6,A0,D0,D1) BUT ASM ' jsr -132(a6)'
  23. #macro UnlockLayerInfo(li) IS (A0:=li) BUT (A6:=layersbase) BUT ASM ' jsr -138(a6)'
  24. #macro NewLayerInfo() IS (A6:=layersbase) BUT ASM ' jsr -144(a6)'
  25. #macro DisposeLayerInfo(li) IS (A0:=li) BUT (A6:=layersbase) BUT ASM ' jsr -150(a6)'
  26. #macro FattenLayerInfo(li) IS (A0:=li) BUT (A6:=layersbase) BUT ASM ' jsr -156(a6)'
  27. #macro ThinLayerInfo(li) IS (A0:=li) BUT (A6:=layersbase) BUT ASM ' jsr -162(a6)'
  28. #macro MoveLayerInFrontOf(layer_to_move,other_layer) IS Stores(layersbase,layer_to_move,other_layer) BUT Loads(A6,A0,A1) BUT ASM ' jsr -168(a6)'
  29. #macro InstallClipRegion(layer,region) IS Stores(layersbase,layer,region) BUT Loads(A6,A0,A1) BUT ASM ' jsr -174(a6)'
  30. #macro MoveSizeLayer(layer,dx,dy,dw,dh) IS ASM ' movem.l d2-d3/a2-a3,-(a7)' BUT Stores(layersbase,layer,dx,dy,dw,dh) BUT Loads(A6,A0,D0,D1,D2,D3) BUT ASM ' jsr -180(a6)' BUT ASM ' movem.l (a7)+, d2-d3/a2-a3'
  31. #macro CreateUpfrontHookLayer(li,bm,x0,y0,x1,y1,flags,hook,bm2) IS ASM ' movem.l d2-d7/a2-a5,-(a7)' BUT Stores(layersbase,li,bm,x0,y0,x1,y1,flags,hook,bm2) BUT Loads(A6,A0,A1,D0,D1,D2,D3,D4,A3,A2) BUT ASM ' jsr -186(a6)' BUT ASM ' movem.l (a7)+, d2-d7/a2-a5'
  32. #macro CreateBehindHookLayer(li,bm,x0,y0,x1,y1,flags,hook,bm2) IS ASM ' movem.l d2-d7/a2-a5,-(a7)' BUT Stores(layersbase,li,bm,x0,y0,x1,y1,flags,hook,bm2) BUT Loads(A6,A0,A1,D0,D1,D2,D3,D4,A3,A2) BUT ASM ' jsr -192(a6)' BUT ASM ' movem.l (a7)+, d2-d7/a2-a5'
  33. #macro InstallLayerHook(layer,hook) IS Stores(layersbase,layer,hook) BUT Loads(A6,A0,A1) BUT ASM ' jsr -198(a6)'
  34. -> --- functions in V39 or higher (Release 3) ---
  35. #macro InstallLayerInfoHook(li,hook) IS Stores(layersbase,li,hook) BUT Loads(A6,A0,A1) BUT ASM ' jsr -204(a6)'
  36. #macro SortLayerCR(layer,dx,dy) IS Stores(layersbase,layer,dx,dy) BUT Loads(A6,A0,D0,D1) BUT ASM ' jsr -210(a6)'
  37. #macro DoHookClipRects(hook,rport,rect) IS ASM ' movem.l d2-d3/a2-a3,-(a7)' BUT Stores(layersbase,hook,rport,rect) BUT Loads(A6,A0,A1,A2) BUT ASM ' jsr -216(a6)' BUT ASM ' movem.l (a7)+, d2-d3/a2-a3'
  38.